##############################################################################
##############################################################################
##############################################################################
##############################################################################
## Master script to run replication code for:
## Lyall and Zhukov, "Fratricidal Coercion in Modern War"
##############################################################################
##############################################################################
##############################################################################
##############################################################################

# Clear workspace
rm(list=ls())

# Set working directory (path should be to folder that contains THIS file)
setwd(grep("Replication_IO$",list.dirs(recursive=TRUE),value=TRUE)) 
if(grepl("code$",getwd())==TRUE){setwd("../")}

# Source code 
source("code/run1_setup.R")
source("code/run2_main.R")
